home *** CD-ROM | disk | FTP | other *** search
/ Merciful 2 / Merciful - Disc 2.iso / software / s / subzerohdinstallers01.dms / subzerohdinstallers01.adf / HD / RiseofRobotsAGA.lha / Install_HD < prev    next >
Text File  |  1980-01-20  |  3KB  |  124 lines
  1. ;
  2. ;    RiSE OF THE ROBOTS -AGA - FROM MiRAGE - HD Installation Script
  3. ;                Done by -Mok-
  4. ;      Greetz to all Prestige members! Now, when you got here
  5. ;                      what are ya gonna do? :-)
  6. ;
  7. ;type credits etc. :)
  8.     ECHO " RiSE OF THE ROBOTS AGA by MiRAGE, Cracked by PRESTiGE" 0 0
  9.     ECHO " HD-INSTALL-SCRiPT written by Mok :-)" 0 0
  10.     downline
  11.     echo " The path you will select should be as short as possible." 0 0
  12.     echo " The installer will create the directory called 'Rise' there." 0 0
  13.     echo " Example: when asked for path, type: DH0:" 0 0
  14.     downline
  15.     echo " Also its not possible to rename/move the game directory later." 0 0
  16.     echo " Full path to the game is stored into mainfile." 0 0
  17.     downline
  18. ;alloc memory for decrunch routine and read it
  19.     ALLOC 0 filelen("RRHD") 10001
  20.     set load mem(0)
  21.     [ load lmem(0) RRHD
  22. ;alloc memory for directory
  23.     ALLOC 1 200 10001
  24.     set dirmem mem(1)
  25. ;alloc MFM buffer
  26.     ALLOC 2 4000 10002
  27. ;alloc mainfile
  28.     ALLOC 4 filelen("Rise") 10001
  29.     [ mem(4) lmem(4) Rise    
  30. ;ask for destination path and go there
  31.     ASKPATH
  32. ;delete existing directory with all the contents
  33.     EXE "c:Delete >NIL: %sRise/#? ALL" fullpath 0
  34.     EXE "c:Delete >NIL: %sRise" fullpath 0
  35. ;check for free space
  36.     FREESPACE Q
  37.     IFBIG Q !14000000 _enuff
  38.     ASK "You need at least 14 Megs of free space to install the game" " _I'LL FIX IT! " 0 0
  39. _abort
  40.     ABORT
  41. _enuff
  42. ;create directory
  43.     MDIR Rise
  44.     CD Rise
  45.     r a0 fullpath
  46.     r a1 mem(4)+3f50c
  47. _copypath
  48.     r d0 peek(\a0)
  49.     pokeb \a1 \d0
  50.     if \d0 0 _endpath
  51.     r a0 \a0+1
  52.     r a1 \a1+1
  53.     go _copypath
  54. _endpath
  55.     ] mem(4) lmem(4) Rise
  56.     FREE 4
  57.     GETDRIVE
  58.     INHIBIT
  59. ;select mfm buffer and directory ad
  60.     r a0 mem(2)
  61.     r a1 mem(1)
  62.     j mem(0)
  63. ;
  64. ;create actual disk variable for disk 1
  65.     set namedisk 'ROR1'
  66.     set disk 1
  67. _insert
  68.     ASK "Please insert RiSE OF THE ROBOTS DISK %ld and press RETURN" " _DONE | _ABORT " disk 0
  69.     ifnot answer 1 _abort
  70.     r d0 namedisk
  71.     j mem(0)+c
  72.     ifnot \d0 0 _insert
  73.     ifnot peekl(mem(1)) 'MOK_' _insert
  74.     ifnot peekl(mem(1)+10) namedisk _insert
  75. _noins
  76.     set acdir mem(1)+20
  77. ;
  78. _nextfile
  79.     r d0 peekl(acdir)
  80.     if \d0 'GAME' _skipfile
  81.     if \d0 'BOOT' _skipfile
  82.     if \d0 'RL32' _skipfile
  83.     j mem(0)+8
  84.     set flen \d0
  85. ;
  86. ;alloc memory for crunched file
  87.     ALLOC 3 flen $10001
  88.     set source mem(3)
  89.     pokeb acdir+4 0
  90.     echo " Reading file.......%s" acdir 0
  91.     upline
  92. ;reading file from disk
  93.     r a0 mem(3)
  94.     r d0 peekl(acdir)
  95.     j mem(0)+4
  96. ;
  97.     echo " Writing file.......%s" acdir 0
  98.     upline
  99.     save acdir mem(3) flen
  100.     FREE 3
  101. _skipfile
  102.     add acdir 10
  103.     ifnot peekl(acdir) 0 _nextfile
  104. _nextdisk
  105.     add disk 1
  106.     add namedisk 1
  107.     ifnot disk !10 _nointro
  108.     set namedisk 'RORA'
  109. _nointro
  110.     ifnot namedisk 'RORD' _insert
  111. _exit
  112.     downline
  113.     echo " To run the game, reboot your computer (if you have only 2 megs" 0 0
  114.     echo " of ram you must use 'boot with no startup-sequence') then" 0 0
  115.     echo " enter the directory you installed the game in. ie type:" 0 0
  116.     downline
  117.     echo " cd %s" fullpath 0
  118.     echo " Rise <return>" 0 0
  119.     FREE 0
  120.     FREE 1
  121.     FREE 2
  122.     END
  123. ;finished :-)
  124.